home *** CD-ROM | disk | FTP | other *** search
- property ancestor, p_parent, p_sprite
-
- on new me, parent, sprite_ref
- ancestor = script("string.class").new()
- me.p_parent = parent
- me.p_sprite = sprite_ref
- return me
- end
-
- on set_score me, the_score
- me.p_sprite.member.text = me.pad_before(string(the_score), 5, "0")
- end
-
- on dispose me
- me.p_sprite = VOID
- callAncestor(#dispose, [me])
- end
-